home *** CD-ROM | disk | FTP | other *** search
- library NTC;
- {
- Copyright (C) 2004 - 2006 Andrew Sprott
-
- http://astronomy.crysania.co.uk
- astro@trefach.co.uk
-
- This program is free software; you can redistribute it and/or
- modify it under the terms of the GNU General Public License
- as published by the Free Software Foundation; either version 2
- of the License, or (at your option) any later version.
-
- This program is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- GNU General Public License for more details.
-
- You should have received a copy of the GNU General Public License
- along with this program; if not, write to the Free Software
- Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
- }
-
- uses
- forms,
- ntc_ciel_client_form in 'ntc_ciel_client_form.pas' {scope},
- ntc_ciel_client_control in 'ntc_ciel_client_control.pas' {scope_control},
- ntc_ciel_client_network in 'ntc_ciel_client_network.pas' {scope_network},
- ntc_ciel_client_info in 'ntc_ciel_client_info.pas' {scope_info},
- ntc_ciel_client_focus in 'ntc_ciel_client_focus.pas' {scope_focus},
- ntc_ciel_client_object in 'ntc_ciel_client_object.pas',
- ntc_ciel_client_button in 'ntc_ciel_client_button.pas',
- ntc_ciel_client_tracking in 'ntc_ciel_client_tracking.pas' {scope_tracking},
- ntc_ciel_client_about in 'ntc_ciel_client_about.pas' {scope_about},
- ntc_ciel_client_search in 'ntc_ciel_client_search.pas' {scope_search},
- ntc_ciel_client_observer in 'ntc_ciel_client_observer.pas' {scope_observer};
-
- {$E .tid}
- {$R *.res}
-
- Exports
- ScopeConnect,
- ScopeDisconnect,
- ScopeClose,
- ScopeSetObs,
- ScopeReset,
- ScopeAlign,
- ScopeShow,
- ScopeShowModal,
- ScopeGetRaDec,
- ScopeGetAltAz,
- ScopeGoto,
- ScopeInitialized,
- ScopeConnected,
- ScopeGetInfo;
-
- begin
- Application.CreateForm(Tscope, scope);
- Application.CreateForm(Tscope_info, scope_info);
- Application.CreateForm(Tscope_focus, scope_focus);
- Application.CreateForm(Tscope_control, scope_control);
- Application.CreateForm(Tscope_search, scope_search);
- Application.CreateForm(Tscope_network, scope_network);
- Application.CreateForm(Tscope_tracking, scope_tracking);
- Application.CreateForm(Tscope_observer, scope_observer);
- Application.CreateForm(Tscope_about, scope_about);
- init_client;
- end.
-
-